C:\to_server\website\mrdcl-learning.com\mrdcl_files\PRJ-106\run.stp
start data,
serial number in columns 1-3,
card characters 1000,
ds $q1=$4/1,2,
x='Yes;
No',
xt='Q1',
!!ul $q1/1,go to q4,
if $q1/1,then,
ds $q2=$5/1,2,e,
x='Yes;
No;
NS',
xt='Q2',
ds $q3=$6/1,2,
x='Yes;
No',
xt='Q3',
endif,
!!@q4,
ds $q4=$7/1,2,
x='Yes;
No',
xt='Q4',
finish data,
start tables,
f=anr,
global bt#='All',
t#1=$q1 *,
t#2=$q2 *,
t#3=$q3 *,
t#4=$q4 *,
finish tables,
